**SI 12
**Data: main.dta

**Variables: main variables
**Additional variables: none
**SI Figure 12.1
use "main.dta"

**SI Figure 12.1 (note, "low" and "High" labels added manually
reg pctelect1 i.balance01##c.prof termlim  tleffect redist  mmds chpart fraction divgov unemployment pres2 y1982 y1984 y1986 y1988 y1990 y1992 y1994 y1996 
margins, dydx (balance01) at(prof=(0.042 (0.05) 0.66)) level(95)
marginsplot, yline(0) recast(line) recastci(rline) ciopts(lpattern(dash)) xlabel(0.04 0.64) title("") xtitle("Professionalism") ytitle ("Effect of Balance")graphregion(fcolor(white)) plotopts(lcolor(black))  ci1opts(lcol(black))
graph save Graph "fig121.gph", replace

**SI Figure 12.2
use "main.dta"
**SI Figure 12.2 (Note, background color and titles adjusted manually using Stata graph editor)
reg pctelect1 i.balance01##c.prof##c.unemployment termlim  tleffect redist mmds chpart fraction divgov pres2 y1982 y1984 y1986 y1988 y1990 y1992 y1994 y1996 
margins, dydx (balance01) at(prof=(0.04 (0.05) 0.64) unemployment = (-1.3, 0.4)) level(95)
marginsplot, yline(0) recast(line) recastci(rline) ciopts(lpattern(dash)) xlabel(0.04  0.64)  graphregion(fcolor(white)) by(unemployment) title("")
graph save Graph "fig122.gph", replace
